home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / comm1 / mcrbbs11.lha / MicroBBS1.1 / Commands / AddLastUser next >
AmigaDOS Script File  |  1996-01-23  |  2KB  |  44 lines
  1. .key NAME,LINE,CONNECT
  2. .bra {
  3. .ket }
  4.  
  5. C:FailAt 21
  6.  
  7. C:Move   BBS:T/LastUser.14 TO BBS:T/LastUser.15
  8. C:Rename BBS:T/LastUser.13 TO BBS:T/LastUser.14
  9. C:Rename BBS:T/LastUser.12 TO BBS:T/LastUser.13
  10. C:Rename BBS:T/LastUser.11 TO BBS:T/LastUser.12
  11. C:Rename BBS:T/LastUser.10 TO BBS:T/LastUser.11
  12. C:Rename BBS:T/LastUser.09 TO BBS:T/LastUser.10
  13. C:Rename BBS:T/LastUser.08 TO BBS:T/LastUser.09
  14. C:Rename BBS:T/LastUser.07 TO BBS:T/LastUser.08
  15. C:Rename BBS:T/LastUser.06 TO BBS:T/LastUser.07
  16. C:Rename BBS:T/LastUser.05 TO BBS:T/LastUser.06
  17. C:Rename BBS:T/LastUser.04 TO BBS:T/LastUser.05
  18. C:Rename BBS:T/LastUser.03 TO BBS:T/LastUser.04
  19. C:Rename BBS:T/LastUser.02 TO BBS:T/LastUser.03
  20. C:Rename BBS:T/LastUser.01 TO BBS:T/LastUser.02
  21. C:Rename BBS:T/LastUser.00 TO BBS:T/LastUser.01
  22.  
  23. RexxC:RX 'Say( left( Date(W),8) Time() left( "{NAME}", 27) "   "left( "{LINE}", 3) left( "{CONNECT}", 20)) >>BBS:T/LastUser.00
  24.  
  25. C:Attach F=BBS:T/LastUser.01 T=T:LU{$$}
  26. C:Attach F=BBS:T/LastUser.02 T=T:LU{$$}
  27. C:Attach F=BBS:T/LastUser.03 T=T:LU{$$}
  28. C:Attach F=BBS:T/LastUser.04 T=T:LU{$$}
  29. C:Attach F=BBS:T/LastUser.05 T=T:LU{$$}
  30. C:Attach F=BBS:T/LastUser.06 T=T:LU{$$}
  31. C:Attach F=BBS:T/LastUser.07 T=T:LU{$$}
  32. C:Attach F=BBS:T/LastUser.08 T=T:LU{$$}
  33. C:Attach F=BBS:T/LastUser.09 T=T:LU{$$}
  34. C:Attach F=BBS:T/LastUser.10 T=T:LU{$$}
  35. C:Attach F=BBS:T/LastUser.11 T=T:LU{$$}
  36. C:Attach F=BBS:T/LastUser.12 T=T:LU{$$}
  37. C:Attach F=BBS:T/LastUser.13 T=T:LU{$$}
  38. C:Attach F=BBS:T/LastUser.14 T=T:LU{$$}
  39. C:Attach F=BBS:T/LastUser.15 T=T:LU{$$}
  40.  
  41. C:Copy BBS:Texte/Header.LastUsers.txt TO BBS:Texte/Stats.LastUsers.txt
  42. C:Type T:LU{$$} NUMBER >>BBS:Texte/Stats.LastUsers.txt
  43. C:Delete T:LU{$$}
  44.